function gcpick_liststations(data, option)
N = str2double(option{2});
if isnan(N)
    N = 3;
end
for i=1:length(data)
    if mod(i,N)==0
        e = 'n';
        fprintf('%d-%s\n',i,data(i).station);
    else
        e = 't';
        fprintf('%d-%s\t',i,data(i).station);
    end
end
if strcmp(e, 't')
    fprintf('\n');
end
end